home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 7 / BBS in a Box - Macintosh - Volume VII (BBS in a Box) (January 1993).iso / Files / Hyper / E / Exegesis Tools.cpt / Exegesis Tools / background_4844.txt < prev    next >
Text File  |  1990-12-13  |  6KB  |  267 lines
  1. -- background: 4844 from stack: in
  2. -- bmap block id: 7519
  3. -- flags: 4000
  4. -- background id: 0
  5. -- name: Par Back
  6. ----- HyperTalk script -----
  7. on opencard
  8.   --this comes from Stack Developer by Steve Drazga
  9.   put (the number of this card - the number of first card of this background+1) into field "Page Num"
  10. end opencard
  11.  
  12.  
  13. -- part 7 (button)
  14. -- low flags: 00
  15. -- high flags: 2000
  16. -- rect: left=453 top=294 right=322 bottom=490
  17. -- title width / last selected line: 0
  18. -- icon id / first selected line: 1012 / 1012
  19. -- text alignment: 1
  20. -- font id: 0
  21. -- text size: 12
  22. -- style flags: 0
  23. -- line height: 16
  24. -- part name: Return
  25. ----- HyperTalk script -----
  26. on mouseUp
  27.   visual effect wipe right
  28.   go to card id 2974
  29. end mouseUp
  30.  
  31.  
  32.  
  33. -- part 13 (field)
  34. -- low flags: 00
  35. -- high flags: 0002
  36. -- rect: left=28 top=69 right=85 bottom=129
  37. -- title width / last selected line: 0
  38. -- icon id / first selected line: 0 / 0
  39. -- text alignment: 0
  40. -- font id: 22
  41. -- text size: 10
  42. -- style flags: 0
  43. -- line height: 13
  44. -- part name: Main Scripture
  45.  
  46.  
  47. -- part 10 (field)
  48. -- low flags: 00
  49. -- high flags: 2007
  50. -- rect: left=24 top=88 right=297 bottom=182
  51. -- title width / last selected line: 0
  52. -- icon id / first selected line: 0 / 0
  53. -- text alignment: 0
  54. -- font id: 3
  55. -- text size: 9
  56. -- style flags: 0
  57. -- line height: 12
  58. -- part name: Main S. Data
  59.  
  60.  
  61. -- part 14 (field)
  62. -- low flags: 00
  63. -- high flags: 2002
  64. -- rect: left=210 top=70 right=86 bottom=311
  65. -- title width / last selected line: 0
  66. -- icon id / first selected line: 0 / 0
  67. -- text alignment: 0
  68. -- font id: 22
  69. -- text size: 10
  70. -- style flags: 0
  71. -- line height: 13
  72. -- part name: Gospel a
  73.  
  74.  
  75. -- part 8 (button)
  76. -- low flags: 00
  77. -- high flags: 2000
  78. -- rect: left=22 top=292 right=321 bottom=54
  79. -- title width / last selected line: 0
  80. -- icon id / first selected line: 12042 / 12042
  81. -- text alignment: 1
  82. -- font id: 0
  83. -- text size: 12
  84. -- style flags: 0
  85. -- line height: 16
  86. -- part name: Home
  87. ----- HyperTalk script -----
  88. on mouseUp
  89.   visual effect iris open
  90.   go Home
  91. end mouseUp
  92.  
  93.  
  94.  
  95. -- part 11 (field)
  96. -- low flags: 00
  97. -- high flags: 2007
  98. -- rect: left=184 top=88 right=297 bottom=352
  99. -- title width / last selected line: 0
  100. -- icon id / first selected line: 0 / 0
  101. -- text alignment: 0
  102. -- font id: 3
  103. -- text size: 9
  104. -- style flags: 0
  105. -- line height: 12
  106. -- part name: Gospel a Data
  107.  
  108.  
  109. -- part 15 (field)
  110. -- low flags: 00
  111. -- high flags: 0002
  112. -- rect: left=360 top=69 right=85 bottom=461
  113. -- title width / last selected line: 0
  114. -- icon id / first selected line: 0 / 0
  115. -- text alignment: 0
  116. -- font id: 22
  117. -- text size: 10
  118. -- style flags: 0
  119. -- line height: 13
  120. -- part name: Gospel b
  121.  
  122.  
  123. -- part 12 (field)
  124. -- low flags: 00
  125. -- high flags: 2007
  126. -- rect: left=354 top=88 right=297 bottom=483
  127. -- title width / last selected line: 0
  128. -- icon id / first selected line: 0 / 0
  129. -- text alignment: 0
  130. -- font id: 3
  131. -- text size: 9
  132. -- style flags: 0
  133. -- line height: 12
  134. -- part name: Gospel b Data
  135.  
  136.  
  137. -- part 16 (button)
  138. -- low flags: 00
  139. -- high flags: 2000
  140. -- rect: left=325 top=297 right=320 bottom=356
  141. -- title width / last selected line: 0
  142. -- icon id / first selected line: 6179 / 6179
  143. -- text alignment: 1
  144. -- font id: 0
  145. -- text size: 12
  146. -- style flags: 0
  147. -- line height: 16
  148. -- part name: Next
  149. ----- HyperTalk script -----
  150. on mouseUp
  151.   visual effect wipe right
  152.   go to next card of this bkgnd
  153. end mouseUp
  154.  
  155.  
  156. -- part 17 (button)
  157. -- low flags: 00
  158. -- high flags: 2000
  159. -- rect: left=176 top=295 right=320 bottom=206
  160. -- title width / last selected line: 0
  161. -- icon id / first selected line: 6460 / 6460
  162. -- text alignment: 1
  163. -- font id: 0
  164. -- text size: 12
  165. -- style flags: 0
  166. -- line height: 16
  167. -- part name: Prev
  168. ----- HyperTalk script -----
  169. on mouseUp
  170.   visual effect wipe left
  171.   go to prev card of this bkgnd
  172. end mouseUp
  173.  
  174.  
  175. -- part 18 (button)
  176. -- low flags: 00
  177. -- high flags: 0000
  178. -- rect: left=55 top=297 right=321 bottom=79
  179. -- title width / last selected line: 0
  180. -- icon id / first selected line: 26635 / 26635
  181. -- text alignment: 1
  182. -- font id: 0
  183. -- text size: 12
  184. -- style flags: 0
  185. -- line height: 16
  186. -- part name: How to…
  187. ----- HyperTalk script -----
  188. on mouseUp
  189.   push card
  190.   go to card id 8834
  191. end mouseUp
  192.  
  193.  
  194.  
  195.  
  196. -- part 20 (field)
  197. -- low flags: 01
  198. -- high flags: 0000
  199. -- rect: left=233 top=298 right=316 bottom=293
  200. -- title width / last selected line: 0
  201. -- icon id / first selected line: 0 / 0
  202. -- text alignment: 1
  203. -- font id: 3
  204. -- text size: 12
  205. -- style flags: 0
  206. -- line height: 16
  207. -- part name: page num
  208.  
  209.  
  210. -- part 21 (button)
  211. -- low flags: 00
  212. -- high flags: 2000
  213. -- rect: left=450 top=28 right=62 bottom=483
  214. -- title width / last selected line: 0
  215. -- icon id / first selected line: 22076 / 22076
  216. -- text alignment: 1
  217. -- font id: 0
  218. -- text size: 12
  219. -- style flags: 0
  220. -- line height: 16
  221. -- part name: Delete Card
  222. ----- HyperTalk script -----
  223. on mouseUp
  224.   answer "Delete this card?" with "Cancel" or "Yes"
  225.   if it is "cancel" then exit mouseUp
  226.   set the cursor to 4
  227.   set lockscreen to true
  228.   domenu "delete Card"
  229.   go prev
  230.   set lockScreen to false
  231. end mouseUp
  232.  
  233.  
  234.  
  235. -- part 22 (button)
  236. -- low flags: 00
  237. -- high flags: 2000
  238. -- rect: left=406 top=29 right=61 bottom=443
  239. -- title width / last selected line: 0
  240. -- icon id / first selected line: 1007 / 1007
  241. -- text alignment: 1
  242. -- font id: 0
  243. -- text size: 12
  244. -- style flags: 0
  245. -- line height: 16
  246. -- part name: ImageWriter
  247. ----- HyperTalk script -----
  248. on mouseUp
  249.   answer "Print ‚ÄúParallels‚Äù Report or Card?" with "Cancel" or "Report" or "Card"
  250.   if it is "Cancel" then
  251.     exit mouseUp
  252.   end if
  253.   if it is "Report" then
  254.     domenu "Print Report..."
  255.     exit mouseUp
  256.   end if
  257.   if it is "Card" then
  258.     open printing with dialog
  259.     if it is empty then
  260.       exit mouseUp
  261.     else
  262.       print this card
  263.       close printing
  264.     end if
  265.   end if
  266. end mouseUp
  267.